home *** CD-ROM | disk | FTP | other *** search
/ Light ROM 3 / Light ROM 3 - Disc 2.iso / programs / pc / l_parser / lparser3.exe / BOP01.LS < prev    next >
Text File  |  1993-11-22  |  324b  |  14 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 5    # recursion depth
  3. 18    # angle
  4. 50    # thickness as % of length
  5. p
  6. p=i++[p+o]--->>[--l]i[++l]--[po]+++po
  7. i=Fs[>>&&l][>>^^l]Fs
  8. s=sFs
  9. l=[c{++f--ff--f++|++f--ff--f}]
  10. o=[&!ce>w>>>>w>>>>w>>>>w>>>>w]
  11. e=FF
  12. w=[c^!F][cc&&&&{---f+++f|---f+++f}]
  13. @
  14.